fe adeaziAe ÉHÉPECE IS
gas erding tours EINEL BLP
lletobre 1356 Fe. ele
Rédacteur: Réal Gagnon 390 Bl. Central Nord Duberger P.Q. 61P 3P9
Collaboration: Simon Rioux, Yves Gagnon
Ce bulletin est conçu avec l'aide du traitement de texte QUILL
(PSION) at de TASPRINT QL (TASMAN SOFTWARE). L'impression se fait
sur
une imprimante NX-10 de STAR .
Es
INFOS : Sinclair News
Entre deux octets
PROG : Enregistrement numerique
(2468)
PROG : Definition de WINDOW
CQL)
PROG > Micre-lusique (PAGE à
QL : Connection a un MODEN
268 : Animation en Langage Machine
Avec l'automne qui arrive, l'avenir des ordinateurs SINCLAIR se
précise, Le SPECTRUM est plus en forme que janais avec l'arrivée
du SPECTRUM +2. Le QL quant à lui attend son heure, soit de
renaissance ou de mort, Mais je pense que l'on peut être
optiniste à son sujet car les pourparlers se poursuivent pour la
faire renaitre de ses cendres encore toute chaudes...
C SINCLAIR NEWS |
SUM N'EST PLUS...
Le magazine SUM a cessé de paraître, Un arrangement avec le
aagazine TINE DESTGNS offre cependant aux abonnés de SUM de
poursuivre leur abonnement avec TIME DESIGNS. I] est à noter
qu'avec le retrait de SUM, TIME DESIGNS devient le plus gros
magazine anéricain dédié aux ordinateurs SINCLAIR.
TIME DESIGNS MAGAZINE parait à tout les 2 sois (comme SIN...) et
contient environ 36 pages. L'abonnement coute $15.00 US,
TIME DESIGNS MAGAZINE, 29722 Hult Rd. , Colton, OREGON 97017 USA
JOYSTICK COMPATIBLE KEMPSTON...
Dans un nunéro précédent de SIN nous avions parlé que les
interfaces JOYSTICKS du SPECTRUM pouvez fonctionner sur le 2068,
Ce qu'il y a d'important de vérifier c'est si l'interface à un
connecteur conne le ZX8i (46 pins) ou un connecteur comme le
SPECTRUM (56 pins), Il faut en prendre un avec le connecteur
comme le 7X81. CHEETAH et DATEL en manufacture un. Voila le
message est lancée!
SINC-LINK...
Le TORONTO TIMEX-SINCLAIR USER CLUB produit à chaque 2 aois un
NEWSLETTER appelé SINC-LINK. 11 contient des articles pour le
1X81, le 2068 et le QL. Le cout de l'abonnenent est de $20.00 par
année (6 nos).
TSU6 P.O. Box 7274 Stn. A , TORONTO, ONTARIO, MSW 1X9
= E E E
NOUVEAU MARCHAND QL...
Un nouveau commerce a fait apparition pour le QL. Il s'agit de
MARKEL ENTERPRISES P.0. Box 2392, Secaucus, NJ 07094-0992 USA
tél. 718-627-1293
COMPILATEUR BASIC 2068...
NOVELSOFT annonce la sortie d'un compilateur BASIC pour le 2068,
TIMACHINE compilerait toutes les commandes BASIC ( sauf les
commandes 1/0 comme SAVE... ) en langage machine et accepte les
calculs en virgule flottante (comme SIN,COS...). Sur la néme
cassette, il y a une version pour le 2068 et une autre pour le
SPECTRUM. TIMACHINE se vend $19.99 US plus $3.00 pour les frais
de poste.
NOVELSOFT, 106 7th STREET, TORONTO, CANADA MOV 3B4
LES MICRODRIVES...
Lors du rachat de SINCLAIR par AMSTRAD, M. Alain Sucre a
clairement indiqué son intention d'abandonner les aicrodrives.
Pour nous heureux propriétaires de QL, cette nouvelle était à
prime abord une catastrophe car les microdrives sont essentiels
pour la sauvegarde ou le chargement de programme a moins de
possèder un interface et lecteur de disquette,
Mais voila que lorsque CLIVE a vendu les droits sur ses
ordinateurs, les droits de manufacturer les microdrives ne
faisait nullement partie de la vente, Un attente s'est
heureusement conclu avec SINCLAIR et ABLEX, le manufacturier des
microdrives pour poursuivre la production de celles-çi, Selon
ABLEX il se vend entre 50 et 60000 cartouches par mois et la
demande ne cesse d'augmenter!
NOUVEAU SPECTRUM...
Le nouveau SPECTRUM tel que promis par AMSTRAD est maintenant
disponible sur le marché anglais, Appelé SPECTRUM +2, le +2
possède les memes caractéristiques que le SPECTRUM + 128K. Sauf
que le clavier a était changé pour faire place à un clavier digne
de ce nos, le magnétophone est maintenant intégré à l'ordinateur
sur le coté droit, Deux prise JOYSTICK font leur apparition aais
il ne réponde à aucun standard,
Dans le SINIO, nous avons vu comment il était possible de créer
des effets d'animation en SINCLAIR BASIC. Comme promis, nous
allons voir maintenant comment il est possible d'obtenir le mêne
effet via le langage machine.
Si nous prenons le programme BASIC : 10 PRINT "#";
20 PRINT CHR§(8);
30 PRINT " "3
40 60 TD 10
la première ligne affiche notre étoile, la deuxième ramène le
curseur à gauche et la dernière efface l'étoile. Puis on PRINT
notre étoile à la position suivante et on recommence avec le même
principe.
En langage machine, la façon la plus simple d'écrire à l'écran
est d'utiliser l'instruction RST 16 (voir SIN#4), En sachant
cela, la conversion BASIC-YLANGAGE MACHINE est très siaple.
ORG 50000
loop LD A,"*
RST 16 PRINT "#"
LD A,8
RST 16 PRINT CHR$ (8)
LD A, 32
RST 16 PRINT" "
JR loop +60 TO loop
Si vous avez un ASSEMBLEUR et que vous tapez et essayez Ce
programme vous découvrez quê les étoiles s'affiche dans le bas de
l'écran car nous n'avons pas initialise celui-ci, Pour ce faire
nous pouvons mettre à zéro la bit 0 de la variable système TVFLAG
(23612).
Un autre problème est la rapidité à laquelle l'animation se
déroule. Si le BASIC est souvent trop lent, le langage machine
est lui trop rapide! Donc il serait bon d'introduire un boucle de
délai pour ralentir le déroulement de l'action.
Dernier problène (et non le aoindre), il est inpossible de faire
BREAK pour arrêter le déroulement d'un programme machine à soins
que le programmeur en offre la possibilité, Lors du développenent
d'un programme, une bonne idée est d'insérer un appel à la
routine de BREAK de la ROM du 2068, comme Ça il n'est plus
nécessaire de faire un RESET de la machine pour corriger une
petite erreur de programmation.
Donc voici la nouvelle version de notre programme en ASSEMBLEUR,
loop
delai
ORS 50000
LD A,O sINITIALISATION DE
LD (23612),À L'ECRAN
LD À,"*
RST 16 SPRINT "#"
CALL delai
LD A,8
RST 16 SPRINT CHR§(8)
LD A,32
RST 16 PRINT * "
CALL 8201 sROUTINE ROM DE BREAK
RET NC +C=0 SI BREAK EST FAIT
JR loop 360 TO loop
LD B,100 sROUTINE DE DELAI
PUSH BC
LD B,100
DINZ di
POP BC
DINZ d0
RET
Pour mettre en pratique le tout voici un petit programme de
démonstration qui nous permet de déplacer notre étoile avec
l'aide du JOYSTICK #1.
La liste ASSEMBLEUR est la pour vous permettre d'étudier le tout.
Si vous n'avez pas d'ASSEMBLEUR sous la main, un programme BASIC
chargera les codes en mémoire pour vous. Pour partir le programme
faites RANDOMIZE USR 50000.
LES PRINCIPALES ROUTINES
LIGNE
400-800
1000-5800
6400-7900
8200-15700
16300-16390
ROUTINE
Initialise l'écran
Boucle principale. Lecture du JOYSTICK et va
à la routine de déplacement appropriée,
Test de la touche BREAK,
Routine de lecture du JOYSTICK. (Voir SIN#2)
Routine de déplacement vers le haut.
Routine de déplacement vers le bas.
t>
16600-16609
16900-16909
18100-19900
20000-20075
20090-20170
LES VARIABLES
17500 POSX
17800 POSY
Routine de déplacement vers la gauche.
Routine de déplacement vers la droite.
Routine de délai.
Impression d'un espace.
Impression de l’étoile.
Position du curseur (ligne)
Position du curseur (colonne)
am
Bienvenue au Club des Utilisateurs
Voulez-vous. .s.ssssssssssssssvesse
* Echanger vos Frogrammes.
* Correspondre avec d'autres Utilisateurs.
# Réaliser des Applications originales.
* Echanger des idées.
* Evaluer des Programmes.
* Avoir une remise de 15% sur Hardware et Software.
* Et bien d'autres Avantages.....-.2..20-
Pour Information :
LE CLUE DES wWTItt SATEURS OGL.
390 Boul. Central N. Québec, GIP 3P9
Tél: (418) 527-6103
QL -
Simon Rioux récidive avec un autre programme qui exploite les
possibilités de la aystérieuse commande SOUND du 2068. Tapez le
U-filS E |
programme et sauvez-le sur cassette, puis faites RUN.
Si le coeur vous en dit,
l'adresse suivante:
vous pouvez communiquer avec Siaon à
SIMON RIOUX
46 Mayburry
Hull, Québec
JOA 1V5
MISE AU POINT
Je tient à préciser que SIN est TOTALEMENT INDEPENDANT de tout
commerce ou club. Toute mention d'un produit, commerce ou club
est publiée dans le seul but de renseigner le lecteur sur les
produits ou les activités existants pour lui permettre de
profiter pleinement de son micro-ordinateur. Le lecteur ne doit
associer en aucune facon SIN et le commerce/produit à moins
d'avis contraire.
Réal Gagnon
14
Coane on le sait, le QL possède 2 sorties séries, SERI et SER2.
SERI est configurée en DCE et utilisée habituellement pour
l'iaprimante. SER2 est quant à elle configurée en OTE, ce qui la
rend idéale pour la connection avec un MODEM. Cependant la
théorie est souvent différente de la réalité. SER2 est très
capricieuse durant une communication et demande des "TIMINGS"
précis pour éviter des pertes de données. Sur certains MODEMS,
les données sont emmagasinges dans une ménoire-tanpon avant
d'être acheminées vers le port série, ceci a pour effet de donner
une chance à SER2 et de capter toutes les données fournies par le
MODEM. Cependant cette caractéristique n'est présente que dans
les MODENS assez dispendieux. Les MODEMS les moins chères demande
l'ajout d'un merveilleuse petite boite fabriquée par MIRACLE
SYSTEMS. Il se nomme le MODAPTOR, Ce qu'il y de bien avec le
MODAPTOR c'est qu'il vient avec un logiciel de communication,
TERMINAL de QCODE.
Le terminal peut fonctionner en 2 modes : VIEWDATA ou VTS2
Enulation. Le premier est surtout utile en Europe car il sert à
accéder au base de données britannique du genre PRESTEL ou
MICRONET, Un échantillon de ce qui disponible avec ces BBS est
fournie sur le nicrodrive et je vous jure qu'il n'y à rien de
telle içi en Amérique du Nord, donc si les comptes de téléphone
élevés ne vous énerve pas... L'autre option, V132, sera plus
utlisée ici. Elle vous permet d'accéder aux BBS de la région de
Québec, du Canada, des Etats-Unis, etc...
Pour plus d'informations:
GAGNON ELECTRONIQUE, 390 BL. CENTRAL, DUBERGER, QUEBEC, GIP 3P9
Si vous avez de la difficulté à trouver du papier pour votre
imprimante TS2040, vous pouvez toujours prendre le papier que
RADIO SHACK offre pour son imprimante TANDY TP-10, I] fonctionne
mieux que celui de TIMEX car il imprime NOIR sur un papier BLANC
et non sur un papier 6RIS.
Simon Rioux
à r P j = x i
D : Enregistrement numerique |
Voici un programme qui permet au 2068 d'enregistrer de la voix ou
de la musique. Pour ce faire, tapez le petit programme BASIC qui
va vous servir à POKEr les codes en aénoire. Entrez les codes de
la première et de la deuxième routine . Faites NEW et tapez:
10 CLEAR 32767: RANDOMIZE USR 65290
Faites jouer un enregistrement de votre voix ou bien un morceau
de ausique sur votre magnétophone. Le 2068 utilisera toute la
ménoire disponible pour enregistrer "numériquement" le son.
Lorsque tout est terminé, faites RANDOMIZE USR 65318 pour
entendre l'enregistrement,
Simon Rioux
fa
PEII CSI CT CA CAT CN
=
5
Ā
5
5
=
&
12
Le kite
(OL: We
Voici un utilitaire qui peut vous facilitez la tâche pour
déterminer les bons paramètres de la commande WINDOW. Cette
commande demande cing paramètres, elle se présente sous la forme
de WINDOW largeur,hauteur,x_position, y position , Donc si nous
avons WINDOW 100,50,0,0 cela signifie un WINDOW de 100 pixels de
large, de 50 pixels de haut et son coin supérieur droit se situe
à la coordonnée (0,0). :
initian y HHS
On le déplace avec les touches curseur. $i on appuie la touche
CTRL avec une des touches curseur, un déplacement rapide
s'effectue. On aodifie les dimensions du WINDOW avec la touche
ALT et les touches curseur,
le #deaz ÜRE
SAREE R FS
des aarding teurs
SIALL ALF
Le programme fournie au bas de l'écran les coordonnées du WINDOW. |
|
|
|
|
|
|
j
i]
|
}
|
100 RENark definition de window gag-086
110 intro
120 OPENY4, ser _160x12a150x200: INK#4, O: PAPERYA, 4:CLS#4
130 LET largeur=100:hauteur=100: xpos=100: ypos=80
140 dessine_fenetre
150 REPeat loop
160 lecture
170 IF NOT aucune _touche:efface fenetre: decision: dessine fenetre
180 END REPeat loop
190 :
200 DEFine PROCedure lecture
210 a=CODE (INKEY§(~1))
220 aucune touche=0
230 END DEFine
240 :
250 DEFine PROCedure decision
260 SELect ON a
270 =192:xpos=xpos-(xpos)0)
280 5200: xpos=xpos+ (xpos+largeur(508)
290 =208: ypos=ypos-(ypos)0)
300 =216: ypos=ypos+(yposthauteur<254)
310 +209: largeur=largeur+(xpos+largeur(508)
320 #217: largeur=largeur-(largeur)1)
330 =201shauteur=hauteur+(yposthauteur(254)
340 =193:hauteur=hauteur-(hauteur)1)
350 #202: xpos=xpos+(10# (xpos+largeur+10¢508))
360 =194: xpos=xpos~(10#(xpos){1))
370 =210: ypos=ypos-(10#(ypos>0))
380 =218: ypos=ypost (10# (yposthauteur+10<254))
390 =REMAINDER ‘aucune _touchezf
400 END SELect
410 BEEP 1,1000
420 END DEFine
430 :
440 DEFine PROCedure dessine _fenetre
450 BLOCK hauteur, largeur, xpos, ypos, 87
460 BORDER#4, 1, 2 ,
470 PRINT#4,' WINDOW shauteurs’,";largeurs",!;xposs",!syposy! !
480 END DEFine
490 :
500 DEFine PROCedure efface fenetre
510 BLOCK hauteur, largeur, xpos, ypos, 0
520 END DEFine
530 :
|
15
540 DEFine PROCedure intro
550 MODE 512
560 YINDOW 512,256,0,0
570 PAPER i:BORDER 1,4
380 CLS
590 WINDOW 244, 100, 129, 40
600 PAPER 4: INK O:BORDER 2,7:CL$
610 (SIZE 1,1
620 PRINT ! DEFINITION de WINDOW!
630 PRINT ! gag-086!
640 CSIZE 0,0: INK 7
650 PRINT ' TOUCHES CURSEUR -> Deplace le WINDOW’
660 PRINT ! CTRL + CURSEUR -> Deplace +10?
670 PRINT ? ALT + CURSEUR -) Dimension du WINDOW
680 PRINT
690 PRINT ' appuyer une touche pour debuter!:PAUSE
700 FOR i=0 TO 100:SCROLL 1:BEEP .5, 1000
710 WINDOW 512,256,0,0:PAPER 1:BORDER 1,4:SCALE 256,0, 0:ÛLS
720 END DEFine
f À Gi Li E À à |
PROSPERO SOFTWARE offre au QL deux langages de programmation, Il
s'agit de PRO PASCAL et de PRO FORTRAN 77, L'avantage de ces
langages, sur le BASIC par exemple, est qu'ils sont conpilés donc
beaucoup plus rapides lors de l'éxecution. Le PASCAL est une
version du standard appellée ISO 7185/ANSI 77043.97, tandis que
le FORTRAN répond à la norme appellée ANSI FORTRAN-77. Ils sont
disponibles tous les deux au prix de ‘86.71 plus ‘5.00 pour les
frais de livraison,
PROSPERO SOFTWARE, 190 CASTELNAU, LONDON S¥13 9DH, ENGLAND
KNIGHTED COMPUTER'S transforme les logiciels du SPECTRUM pour
qu'ils puissent fonctionner sur le 2068. L'avantage de ces
traductions se retrouve dans les jeux qui utilisent, après la
transformation, le port JOYSTICK du 2068.
Voici une liste des jeux déja traduits: TRASHMAN
TRAVEL WITH TRASHMAN
FIGHTER PILOT
NIGHT GUNNER
TURBO ESPRIT
SABOTEUR
COMPLETE M.C. TUTOR
ZIP BASIC COMPILER
KNIGHTED COMPUTERS, 707 HIGHLAND STREET, FULTON, NY 13069 USA
Peut-être avez vous déjà vu sur d'autres ordinateurs le programme
PRINTSHOP, Ce programme sert à créer des posters, des banières,
des cartes de voeux. Le mème type de programme existe gaintenant
pouur le 2068. Le premier programme s'appelle GREETING CARD
DESIGNER. Il sert, comme son noa l'indique, à imprimer des cartes
de voeux. BANNER DESIGNER sert à produire des baniéres, et POSTER
DESIGNER est pour évidemment les posters. Ces progrannes sont
produits par ZEBRA SYSTEMS.
ZEBRA SYSTEMS Inc. 78-06 Jamaica Avenue, Woodhaven NY 11421 USA
Les versions 2.35 des logiciels PSION du QL sont arrivés à
Québec, Pour les obtenir informez-vous chez SAGNON ELECTRONIQUE à
DUBERGER.
ABONNEMENT SIN
ae, Wee | COR o 4 Tae A we yee gees
Et CLIM ENT i LE Puer?
i aa 8, ft
LISTE DES ANCIENS NUNEROS
NUMERO : 6 DATE : janvier 1986 NBRE de PAGES : 19 PRIX : $2.00
ARTICLE : Sinclair-News, Hardware-News, Les Trucs & Astuces du 2068
PROGRAMME : Solitaire ($P/2068), Caractères Alternatifs (SP/2068)
QL : Rencontre avec le coeur du QL, le 4C68008
QL Caractères francais avec QUILL, le traitement de texte
TECHNIQUE : Des fonctions utiles avec DEF FN
TECHNIQUE : Le décodage du clavier du 2068
ARTICLE : Initiation au langage machine, Entre 2 octets...
NUMERO : 7 DATE : février 1986 NBRE de PAGES : 19 PRIX : $2.00
Article : Sinclair-News, Entre 2 octets...
SPECIAL : Sprite Basic pour le Spectrum
AL : Périphériques et logiciels pour le QL
Logiciel +: Monopoly, Scrabble, The way of the exploding fist
1x81 : Des trucs pour charger les programmes avec succes
NUMERO : @ DATE : mars 1986 NBRE de PAGES : 19 PRIX : $2.00
ARTICLE + Sinclair-News, Entre 2 octets..., Trucs pour le 2068
PROGRAMME : 10 polices de caractères en mene temps pour le 2068 !
PROGRAMME : Calcul de la facture d'électricité (SP/2068)
QL : Les commandes non-docunentées du QL
LOGICIEL : Highway Encounter (SP), Voice Chess (2068), Chess (2068)
TECHNIQUE : Programmation en langage machine
TECHNIQUE : Les signaux et les connecteurs du 2068/7X81/Spectrua
NUMERO : 9 DATE : avril-mai 1986 NBRE de PAGES : 19 PRIX : $2.00
ARTICLE + Sinclair News, Entre deux octets...
PROGRAMME : Scrolls d'ecrans (2068), Effets speciaux (QL)
QL : Encore les commandes non-documentees du QL
PROJET + Conversion du 2068 en 1X SPECTRUM
PROGRAMME : Composeur telephonique (2068)
TECHNIQUE : Les connecteurs du QL
ARTICLE : Neuf logiciels pour le SINCLAIR QL
ARTICLE : Les Trucs et astuces (2068/QL)
NUMERO : 1
ARTICLE
PROGRAMME
QL
PROGRAMME
PROGRAMME :
TECHNIQUE
QL
O DATE : juin-juil 1986 NBRE de PAGES : 20 PRIX : 2,00
: Sinclair News , Hardware News , Software News , Entre 2 octets...
: Nicro-Musique , avec la commande SOUND, Johnny B. Goode,Air Anglais
: La norae RS-232c
: Caractères soulignés via le BASIC du 2068 (2068/SP)
Création de ligne zéro (2068/5P)
Animation en BASIC (2068/SP)
Les POKEs utiles...
NUMERO : 11 DATE : AQUT-SEPT 86 NBRE de PAGES : 20 PRIX : 2.00
ARTICLE
PROGRAMME
PROGRAMME
PROGRAMME
ql
LOGICIEL
OFFRE
Sinclair News , Entre deux octets...
Headerlist (2068)
Solitaire (QL)
Calcul d'interet (2068)
Les Microdrives ,
MEGABASIC et BETA BASIC (SPECTRUM)
TASPRINT et KNIGHT FIGHT (QL)
NUTRITEST , logiciel gratuit pour le 2068
GL: PROGRAMMES DIVERS Tasse
Voici trois programmes qui peuvent être utile.Le
premier programme il suffit d'entrer un texte et l'ordinateur
vous dira combien il y a de aots dans ce texte.Le deuxième
programme entrer un eot et l'ordinateur vous dira si ce aot
est un palindrome. Et le dernier programme est une conversion
de degré Fahrenheite à Celcius.
Yves Gagnon,
100 REMark COMPTE LES MOTS DANS UN TEXTE
110 :
120 CES: COMPTE=0s INPUT 'ENTREZ VOTRE TEXTE: ls A$
130 FOR TEXTE=1 TO LEN(AS)
140 IF AS(TEXTE TO TEXTE) <> * " THEN 60 TO 160
150 LET COMPTE=COMPTE+!
160 END FOR TEXTE
170 PRINT \\'IL Y A 'SCOMPTE+L;! MOTS DANS LE TEXTE?
100 REMark CE PROGRAMME RECONNAIT UN MOT PALINDROME
110 :
120 CLS:B$="": INPUT "ENTREZ VOTRE MOT: '3A$
130 FOR MOT=LEN(A$) TO 1 STEP -1
140 LET B$=B$A$ (MOT TO MOT)
150 END FOR MOT
160 IF A$=8$ THEN PRINT\\ "CE MOT EST UN PALINDROME":STOP
170 PRINT\\ "CE MOT N'EST PAS UN PALINDROME"
106 REMark CONVERSION TEMPERATURE
110:
120 CLS:CELCIUS=0: INPUT'ENTREZ DEGRE FAHRENHEIT: 3 TEMPERATURE
130 CELSIUS=5#(TEMPERATURE-32) /9
140 PRINT\\'DEGRE CELCIUS= 'sCELSIUS